home *** CD-ROM | disk | FTP | other *** search
/ PC Plus SuperCD (UK) 1997 May / PC Plus Super CD Issue 127 (May 1997).iso / handson / handson.exe / WITHUNIT.DFM / WITHUNIT.txt
Encoding:
Text File  |  1997-01-31  |  905 b   |  47 lines
  1. object Form1: TForm1
  2.   Left = 200
  3.   Top = 99
  4.   Width = 378
  5.   Height = 298
  6.   Caption = 'Form1'
  7.   Font.Color = clWindowText
  8.   Font.Height = -13
  9.   Font.Name = 'System'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   TextHeight = 16
  13.   object Button1: TButton
  14.     Left = 48
  15.     Top = 23
  16.     Width = 89
  17.     Height = 33
  18.     Caption = '&Click Me!'
  19.     TabOrder = 0
  20.     OnClick = Button1Click
  21.   end
  22.   object Edit1: TEdit
  23.     Left = 176
  24.     Top = 31
  25.     Width = 121
  26.     Height = 24
  27.     TabOrder = 1
  28.   end
  29.   object Memo1: TMemo
  30.     Left = 48
  31.     Top = 95
  32.     Width = 249
  33.     Height = 145
  34.     Alignment = taCenter
  35.     Lines.Strings = (
  36.       'This simple program illustrates '
  37.       'the use of Pascal'#39's WITH to set '
  38.       'multiple properties of a specified '
  39.       'object - here the Edit1 text box.'
  40.       ''
  41.       'Just click the button to see the '
  42.       'results.')
  43.     ReadOnly = True
  44.     TabOrder = 2
  45.   end
  46. end
  47.